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COPYRIGHT (c) 1978, 1980, 1982, 1984 BY 
DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. 
ALL RIGHTS RESERVED. 


THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED 
ONLY IN ACCORDANCE E R C 
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10 ;* * 3 

11 58 * 3 

09 \ 3* LY IN WITH TH $ SU LICENSE AND WITH THE * : 

15 ;* INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS ARE OR THE * ‘ 

8 88 14 ;* COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * ‘ 

15 ;* PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * ° 

0 BS 18 a TRANSFERRED. * : 

° & . 

o 00 18 3* THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * : 

00 19 ;* AN SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * : 

8 38 :* CORPORATION. a : 

Py} * e 

0000 ¢ 3* DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS * . 

8 o8 Z = SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * ; 

: ® ul 

8 09 é t adeeeneneneoneeeeunennennbsonnsconesneeanbeseeeabantosnenseeoeetesesensoone : 

9000 8” ; 

0000 9 ;+4 3 

464 0; 3 FACILITY LINKER ; 

44 ¢i : ABSTRACT: COMPUTE AN ELAPSED TIME FROM TWO ABSOLUTE TIMES ‘ 

0000 Li ; 

44 23 3; ENVIRONMENT: : 

0900 i AUTHOR: T.J. PORTER, CREATION DATE: 27-JUN-77 : 

0900 39 ; MODIFIED BY: ; 

$000 41 v02-001 BLS0035 Benn Schreiber 19-Jan-1981 : 
444 4g ; Change to longword displacement 
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45 ; .SBTTL DECLARATIONS 
23 + INCLUDE FILES: 
8 
4 
os 
! ; MACROS: 
§ ae: 
0 5 ; EQUATED SYMBOLS: 
00000004 8 $8 $ TIMEADDR1 = 4 ; FIRST ARGUMENT IS TIME 1 ADDRESS 
00000008 9000 38 TIMEADDR2 = 8 : SECOND IS ADDRESS OF TIME 2 
0000 60 ; OWN STORAGE: 
00000000 be . -PSECT $OWNS,NOEXE,QUAD 
0000 63 ELAPSED: 
00000000 00000000 9000 64 .QUAD 0 ; THE COMPUTED ELAPSED TIME 
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= .SBTTL LNKSCALCELAPS 
: FUNCTIONAL DESCRIPTION: 


THIS ROUTINE IS CALLED TO LCULATE THE ELAPSED TIME BETWEEN TWO 

oy UTE TIME VALUES. THE ADDRESS OF THE RESULT IS RETURNED AS THE VALUE OF 
THE ELAPSED TIME IS IN THE "DELTA TIME’ FORMAT OF THE SYSTEM AND 

eee te tint FOR DISPLAYING THROUGH SYSTEM SERVICES 


CALLING SEQUENCE: 
LNKSCALCELAPS(TIMEADDR1, TIMEADDR2) 
WHERE: TIMEADDR1 = tte i tetera CONTAINING THE 
TIMEADDR2 = ADDRESS OF A QUADWORD CONTAINING THE 
END TIME. 


INPUT PARAMETERS: 
AS ABOVE 

IMPLICIT INPUTS: 
NONE 

OUTPUT PARAMETERS: 


THE ROUTINE HAS AS ITS VALUE (1.E. CONTENT RETURNED IN RO) 
THE ADDRESS OF AN OWN QUADWORD CONTAINING THE VALUE 


IME1 = TIME 
WHICH IS (PRESUMABLY) NEGATIVE. 
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IMPLICIT OUTPUTS: 
NONE 

; COMPLETION CODES: 

NONE 

; SIDE EFFECTS: 

NONE 


COOoOOCOCOCOCSOOOCSOSOSOOSOOSOOOOSOOSOOSOSOOOOOOOOOOOOOOOSoS S 
OOOCCOCOCOCOCOOCSOOOOCOOOOOOOOOOOOOOoCOoOO 


sPSECT SCODES,NOWRT LONG 
LNKSCALCELAPS: : 

- WORD 
pbwgRo TO RECEIVE RESULT 


50 “sep ’ 
WITH TIME 1 
HALF OF 


—F ONMOOOO096909 006000 Od Gd 6d Gd Cd Cd Cd Gd Cd OD Cd Cd OD OD CD Cd Cd Gd Gd CD Gd Gd Cd Gd Gd Od OD OP GD Cd CD. 0D GD GD GD CD CD CD CD CDCDODCD 


WR OOOO WE WO OONO UIE WIN OO 


eh a a et a eh th at ts a sh 


—DOOOCQOQOOOOOOSoOooOo 


Sete Oe See 
Ne OQ 


LNKSCALCELAPS 


04 A061 b? B38 | 


1 


we 
RET 
» END 


B78Ep=198e 61:03:88 
(RT) ,4(RO) : Tyme 


AX/ 
LIN 


TH 
ORR 


VM 
KE 


«SREIEN 


v04-00 
KELAPST.MAR; 1 


a 
R 

44 HIGH ORDER HALF WITH CARRY 
SPOND I 


Page (4) 


NG HALVES OF TIME 1 


Rr tr mwDwun 


AX/VMS Macro V04-00 Page 


LNK_E gtd ny S ro 
e LINKER. SRCIJLNKELAPST.MAR; 1 


SymBol tab 


ELAPSED R 8) 
SOR CEL APS RG 2 
TIMEADOR = 

TIMEADDR2 = 00 8 
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! Psect synopsis ! 

$oceewewcecccoece 
PSECT name Allocation PSECT No. Attributes 
, 2B ~ at 44 ( on 9 ( 9} NOPIC USR CON ABS _ LCL NOSHR NOEXE NORD NOWRT NOVEC BYTE 
SOWNS 0000 ( -) O1¢ 1.) NOPIC USR CON REL LCL NOSHR NOEXE' AD WRT NOVEC QUAD 
SCODES 00000019 ¢ 25.) 02 ¢ 2.) NOPIC USR CON REL’ LCL NOSH EXE RD NOWRT NOVEC LONG 


gem oe oes ec es won e em eemocenn + 

H Performance indicators ! 
Phase Page faults CPU Time Elapsed Time 
Initialization 33 90:00: 0.06 00:00:01.11 
Command processing 103 0:00:00. ? ee ie 
Pass 67 00:00: 3. 0:00:01.49 
Ty papas sh HRSRBRHE 88:88 8808 
Symbol table output 2 09:00:00:01 $6;09:00:65 
Psect synopsis output 1 00:00: 8° O8 00:00:00.06 
Cross-reference output 0 +b $4 0 00:00:00.00 
Assembier run totals 246 0:00:01.28 00:00:07.17 


ages. 
1255 bytes pages) of virtual onary were used to buffer the intermediate code. 
There were pages of symbol table space allocated to hold 4 non-local and 0 local symbols. 
126 source Lines were read in Pass 1, progyc ing 13 object records in Pass 2. 
0 pages of virtual memory were used to define 0 macros. 


The werk tng get Limit was 900 
10 
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H Macro Library statistics ! 


ewe tense ne wee eee rom awm ae ene + 


Macro Library name Macros defined 
“$255$DUAZ8:(SYSLIBISTARLET.MLB;20 0 (itt 0 
0 GETS were required to define 0 macros. 

There were no errors, warnings or information messages. 
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